home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_11627.txt < prev    next >
Text File  |  1990-08-14  |  8KB  |  322 lines

  1. -- card: 11627 from stack: in
  2. -- bmap block id: 12432
  3. -- flags: 4000
  4. -- background id: 4754
  5. -- name: Student Details
  6. ----- HyperTalk script -----
  7. on rollingDemo
  8.   answer "Student Details demo will take approx. 3 min." with "Cancel" or "OK"
  9.   if it is "Cancel" then exit rollingDemo
  10.   set the cursor to none
  11.   lock screen
  12.   go to card "Rolling Demo Instructions" of this background
  13.   unlock screen with dissolve fast
  14.   repeat until the mouseClick
  15.   end repeat
  16.   set the cursor to hand
  17.   autoMouse moveMouse,420,60
  18.   click at the loc of bg button id 7
  19.   showInfo "Introduction",false
  20.   wait 1 second
  21.   set the cursor to hand
  22.   autoMouse menuMouse,2,1 -- New Student‚Ķ
  23.   if the result is "Item not found" then -- test for XCMD bug
  24.     send "doMenu New Student‚Ķ" to background "Student Details"
  25.   end if
  26.   set the cursor to none
  27.   wait 1 second
  28.   type "777"
  29.   wait 30
  30.   tabKey
  31.   type "Richter"
  32.   wait 30
  33.   tabKey
  34.   type "Robert"
  35.   wait 30
  36.   tabKey
  37.   type "Charlie"
  38.   wait 30
  39.   tabKey
  40.   type "108th N.E."
  41.   wait 30
  42.   tabKey
  43.   type "545"
  44.   wait 30
  45.   tabKey
  46.   type "#6"
  47.   wait 30
  48.   tabKey
  49.   type "Bellevue"
  50.   wait 30
  51.   tabKey
  52.   type "Washington"
  53.   wait 30
  54.   tabKey
  55.   type "98004"
  56.   wait 30
  57.   tabKey
  58.   type "555-5493"
  59.   wait 30
  60.   put "12" into card field "Grade"
  61.   put "12" into background field "Grade"
  62.   wait 30
  63.   put "102" into card field "Homeroom"
  64.   put "102" into background field "Homeroom"
  65.   wait 30
  66.   select text of card field "Area"
  67.   type "3"
  68.   wait 30
  69.   tabKey
  70.   type "Male"
  71.   wait 30
  72.   tabKey
  73.   type "700 567 345"
  74.   wait 30
  75.   tabKey
  76.   type "Dec 28, 1970"
  77.   wait 30
  78.   tabKey
  79.   type "1988"
  80.   wait 30
  81.   tabKey
  82.   type "New York, NY"
  83.   wait 30
  84.   tabKey
  85.   type "Sept 2, 1980"
  86.   wait 30
  87.   tabKey
  88.   type "456"
  89.   wait 30
  90.   tabKey
  91.   type "Farlie Middle School"
  92.   select empty
  93.   showInfo "Personal Tab",true
  94.   wait 2 seconds
  95.   click at the loc of background button "SD Contacts"
  96.   select empty
  97.   showInfo "Contacts Tab",true
  98.   wait 30
  99.   click at the loc of button "Copy 1"
  100.   wait 30
  101.   tabKey
  102.   type "Mrs."
  103.   wait 30
  104.   tabKey
  105.   type "Richter"
  106.   wait 30
  107.   select text of card field "Work Phone 1"
  108.   type "555-9012"
  109.   wait 30
  110.   tabKey
  111.   type "Interior Designer"
  112.   wait 30
  113.   tabKey
  114.   type "Yes"
  115.   wait 2 seconds
  116.   tabKey
  117.   type "Mr."
  118.   wait 30
  119.   tabKey
  120.   type "Richter"
  121.   wait 30
  122.   tabKey
  123.   type "Bayview Road"
  124.   wait 30
  125.   tabKey
  126.   type "1093"
  127.   wait 30
  128.   tabKey
  129.   tabKey
  130.   type "Alameda"
  131.   wait 30
  132.   tabKey
  133.   type "California"
  134.   wait 30
  135.   tabKey
  136.   type "94801"
  137.   wait 30
  138.   tabKey
  139.   type "555-0391"
  140.   wait 30
  141.   tabKey
  142.   tabKey
  143.   type "Unemployed"
  144.   wait 30
  145.   tabKey
  146.   type "No"
  147.   wait 2 second
  148.   select text of card field "Legal Alert"
  149.   type "Legal alerts are up to 128 characters in length "
  150.   type "and will fit on two lines."
  151.   select empty
  152.   wait 2 seconds
  153.   click at the loc of background button "SD Misc"
  154.   showInfo "Misc. Tab",true
  155.   wait 1 second
  156.   click at the loc of button "Group One"
  157.   wait 1 second
  158.   click at the loc of button "Group Four"
  159.   wait 1 second
  160.   click at the loc of button "Group six"
  161.   wait 1 second
  162.   put "Academic" into card field "Normal Program"
  163.   wait 1 second
  164.   put "Bob Dean" into card field "Counselor"
  165.   wait 1 second
  166.   put "American" into card field "Ethnic Category"
  167.   wait 1 second
  168.   put "English" into card field "Home Language"
  169.   wait 1 second
  170.   put "Reduced Price" into card field "Lunch status"
  171.   wait 2 seconds
  172.   click at the loc of background button "SD Status"
  173.   select empty
  174.   wait 2 seconds
  175.   put "Left" into card field "Status Codes"
  176.   wait 1 second
  177.   put "Nov 29, 1988" into card field "Dates"
  178.   wait 1 second
  179.   select text of card field "Comments"
  180.   type "Moved out of state."
  181.   wait 1 second
  182.   tabkey
  183.   type "Bus Route 306, Bus number 12 corner of 41st St. and Smith Ave."
  184.   wait 2 seconds
  185.   click at the loc of background button "SD Health"
  186.   wait 1 second
  187.   type "Dr. Ford"
  188.   wait 30
  189.   tabkey
  190.   tabkey
  191.   type "None"
  192.   wait 1 second
  193.   click at the loc of button 1
  194.   wait 1 second
  195.   click at the loc of button 2
  196.   wait 1 second
  197.   select text of card field "Medical Alert"
  198.   type "allergic to penicillin"
  199.   wait 30
  200.   tabkey
  201.   type "Polio vaccination: May 31, 1985" & return
  202.   wait 30
  203.   type "Broken arm, Sept. 19, 1986. Robert broke his arm in P.E. class "
  204.   type "during a football game. He was immediately taken to emergency "
  205.   type "at St. Paul‚Äôs hospital."
  206.   wait 2 seconds
  207.   click at the loc of background button "SD Comments"
  208.   wait 1 second
  209.   type "1987 - won the President‚Äôs writing contest." & return
  210.   wait 30
  211.   type "The size of this field is dependent on available disk space."
  212.   wait 2 seconds
  213.   click at the loc of background button "SD Disc"
  214.   select empty
  215.   showInfo "Dicipline Tab",true
  216.   wait 1 second
  217.   click at the loc of button "New Infraction"
  218.   wait 1 second
  219.   click at the loc of card button "Infraction3"
  220.   put line 3 of card field "Select Infraction" into card field "Infraction"
  221.   wait 1 second
  222.   click at the loc of card button "Teacher2"
  223.   put line 2 of card field "Select Teacher" into card field "Teacher"
  224.   wait 1 second
  225.   click at the loc of card button "Teacher4"
  226.   put line 4 of card field "Select Teacher" into card field "Administrator"
  227.   wait 1 second
  228.   select text of card field "Location"
  229.   type "gym"
  230.   wait 1 second
  231.   click at the loc of button "Suspended"
  232.   wait 1 second
  233.   put the seconds + 5256000 into tempdate
  234.   convert tempdate to abbrev date
  235.   put item 2 to 3 of tempdate into tempdate
  236.   put empty into char 2 to 3 of item 2 of tempdate
  237.   put tempdate into card field "Suspended To"
  238.   wait 1 second
  239.   click at the loc of button "OK"
  240.   wait 2 seconds
  241.   click at the loc of background button "SD User"
  242.   select empty
  243.   showInfo "User Definable Tab",true
  244.   wait 1 second
  245.   tabKey
  246.   type "Football"
  247.   wait 30
  248.   tabKey
  249.   type "Young Republicans"
  250.   wait 30
  251.   tabKey
  252.   type "Coin collecting"
  253.   wait 30
  254.   tabKey
  255.   type "Route 306, Bus #12"
  256.   wait 30
  257.   tabKey
  258.   tabKey
  259.   type "145"
  260.   wait 30
  261.   tabKey
  262.   type "36 24 34"
  263.   wait 30
  264.   tabKey
  265.   type "PHE 823"
  266.   wait 1 second
  267.   click at the loc of background button "Done"
  268.   lock screen
  269.   send "doMenu About" to background "Student Details"
  270. end rollingDemo
  271.  
  272. on showInfo fieldName,cardPict
  273.   lock screen
  274.   set the cursor to none
  275.   restoreMenuBar false
  276.   grayPicture cardPict
  277.   installMenuBar 1170,1171,1172,1173,1174,1175
  278.   show card field fieldName
  279.   unlock screen with dissolve
  280.   put the secs into temp
  281.   repeat until the mouseClick
  282.     if (the secs - temp) > 30 then show card field "Continue"
  283.   end repeat
  284.   lock screen
  285.   hide card field fieldName
  286.   hide card field "Continue"
  287.   pop card
  288.   unlock screen with dissolve
  289.   if the optionKey is down then exit to HyperCard
  290. end showInfo
  291.  
  292.  
  293. -- part contents for background part 5
  294. ----- text -----
  295. Student Details
  296.  
  297. -- part contents for background part 6
  298. ----- text -----
  299. The Student Details module affords quick and easy access to extensive information about every student you enter into the Mac School database.  It contains information such as: 
  300.  
  301.    ‚Ä¢  student names
  302.    ‚Ä¢  student addresses
  303.    ‚Ä¢  contact names
  304.    ‚Ä¢  emergency contacts
  305.    ‚Ä¢  homeroom number
  306.    ‚Ä¢  bus status
  307.    ‚Ä¢  25 user definable fields
  308.    ‚Ä¢  enrollment status
  309.    ‚Ä¢  health records
  310.    ‚Ä¢  administrative school comments
  311.    ‚Ä¢  disciplinary information
  312.    ‚Ä¢  legal alerts
  313.    ‚Ä¢  12 user definable flags (yes/no questions)
  314.    ‚Ä¢  and much more!!
  315.  
  316. Student information can either be hand entered or imported in ASCII format from already existing information on a district mainframe, Apple //GS (from Appleworks), IBM PC, or any system that can create an ASCII file.
  317.  
  318. Reporting options are endless!  Student Details contains some pre-designed reports for you to use, however through the Report Manager module, Mac School allows you the user to design your own reports!  
  319.  
  320. Multi-User Capabilities.  By placing Mac School on a network such as AppleShare or TOPS you will be able to take full advantage of the multi-user environment.  For example:  the Principal, Attendance Clerk, and Counselors, over the network, will all be able to access information regarding the same student at the same time or different students at the same time. 
  321.  
  322. Note:  the first individual to bring up a student record will have edit access, others will have view, until such a time when the first individual closes the record.